% SIMPLE 2-D, 1-G, fixed source problem


Y = 10;
it = 1;

dat = [ 0.5   0.2   0.0   ];   

abdat = [0.2];    

numg = 1;  numm = 1;

if numel == 1
% still simple, but nine coarse meshes, uniform
xcm  = [ 0   2   4   6 ];
xfm  = [   1   1   1   ]*10;
ycm  = [   0     1  ];
yfm  = [     3      ];
mt   = [   1   2   1   ]';  
else
%still simple, but nine coarse meshes, uniform
xcm  = [   0     2     4      6  ];
xfm  = [     1      1      1     ]*Y;
ycm  = [   0     2     4      6      8     10    12];
yfm  = [     1      1      1     1      1     1    ]*Y;
mt   = [  1 1 1 1 1 1
          1 2 1 1 2 1
          1 1 1 1 1 1 ];         
end

BCL = 0;
BCR = 1;
BCB = 1;
BCT = 1;        
       

IBSL = [ 0 
         0 ]';
IBSR = [ 0     
         0 ]';  
IBSB = [ 0                   
         0 ]'; 
IBST = [ 0
         0 ]';     

src=0;